<?
class ControlContrato extends CI_Controller
{
	function ControlContrato(){}


    public function VerContrato($cliente,$monto,$duracion)
	{
		$num_mes=date("n");
		$mes="";
                switch($num_mes)
		{
			case 1:$mes="Enero";
			break;
			case 2:$mes="Febrero";
			break;
			case 3:$mes="Marzo";
			break;
			case 4:$mes="Abril";
			break;
			case 5:$mes="Mayo";
			break;
			case 6:$mes="Junio";
			break;
			case 7:$mes="Julio";
			break;
			case 8:$mes="Agosto";
			break;
			case 9:$mes="Septiembre";
			break;
			case 10:$mes="Octubre";
			break;
			case 11:$mes="Noviembre";
			break;
			case 12:$mes="Diciembre";
			break;

		}
		
		$Locador="ATLAS INTERNATIONAL SERVICE S.A.";
		$Loc_Dir="Av. Los Pinos 243 Urb. Villa Marina - Chorrillos";

		$Fecha=date('d')." de ".$mes." del ".date('Y');                
		$cab=array("Cliente",utf8_decode("Dirección"),"DNI",utf8_decode("Teléfono(s)"),"Locador",utf8_decode("Dirección"),"Fecha de Ingreso","Importe");
		$dat=array($cliente[0],$cliente[1],$cliente[2],$cliente[3],$Locador,$Loc_Dir,$Fecha,'S/. '.round($monto,2));
		
		include("D:/AppServ/www/qverde/application/ClasePDF/fpdf.php");
                $pdf=new FPDF('P','mm','A4');
                $pdf->SetMargins(25,40);
                $pdf->AddPage();

                $pdf->SetFont('Courier','BU',14);
                $titulo='CONTRATO DE ALMACENAJE';
                $pdf->Cell(200,5,$titulo,0,1,'C');
		$pdf->Cell(0,5,'',0,1);
		$pdf->Cell(0,5,'',0,1);

for($i=0;$i<=7;$i++)
{		$cabecera=$cab[$i].":";
                $pdf->SetFont('Courier','B',11);
                $pdf->Cell(45,5,$cabecera,0,0,'L');
                $pdf->SetFont('Courier','',11);
                $pdf->MultiCell(0,5,$dat[$i],0,'L');
}

		$titulo_clau=array("PRIMERO","SEGUNDO","TERCERO","CUARTO","QUINTO","SEXTO","SEPTIMO","OCTAVO","NOVENO","DECIMO","UNDECIMO");

$clausula[0]=utf8_decode("El almacenaje de los bienes dejados en depósito queda convenido en S/. ".round($monto,2)." mensuales, No Incluye I.G.V. referente solo al alquiler del espacio que ocupan sus bienes usados por el periodo acordado con el cliente de 6 meses.");

$clausula[1]=utf8_decode("El importe señalado anteriormente quedará sujeto al incremento de la tasa mas alta señalada y aprobada por el Banco Central de Reserva del Perú, para operaciones financieras, en caso de incumplimiento de los pagos.");

$clausula[2]=utf8_decode("El importe de las mensualidades convenidas se pagará en alguna de las siguientes formas a su elección:\n\na)	Abono en nuestra cuenta corriente Soles del Banco Continental 0317-0100000192.\n\nb)	Pago en nuestras oficinas: Av. Alameda Los Pinos 243 Urb. Villa Marina Chorrillos (Alt. Cdra. 4-5 de la Av. Santa Anita).\n\nc)	Cobranza en su domicilio previa coordinación de la fecha y hora. Si hubiese mala información de su parte y al ir no se encuentra el dinero cobraremos un falso flete de S/. 20.00 (Veinte y 00/100 Nuevos Soles), caso contrario tendrían que optar por una de las opciones a, b o c.\n\nTODAS nuestras cobranzas, tienen una tolerancia de 3 días calendario, caso contrario se aplicará la cláusula anterior, considerándose día a día. Independientemente, los bienes se podrán trasladar a otro almacén.");

$clausula[3]=utf8_decode("Si el cliente dejara de abonar tres importes en forma consecutiva o alternada, se dará por resuelto el presente contrato aplicándose el remate de los bienes, sin mayor trámite y autorización que la suscripción del presente convenio, para hacerse efectivo el contrato.");

$clausula[4]=utf8_decode("Este contrato no obliga al almacén a ejercer defensa ante terceros por la titularidad de los bienes entregados, ni a impedir a las autoridades la revisión o decomiso de los mismos, costos que serán de absoluta responsabilidad  del contratante y  que por la suscripción de este contrato exime de cualquier acción, que por acción, comisión u omisión obligue al almacén a resarcir o indemnizar al contratante por estas consideraciones pues la naturaleza del contrato es el servicio de almacenaje.");

$clausula[5]=utf8_decode("El contratante es el absoluto responsable del ingreso legal así como de la titularidad de sus bienes. No podrá extenderse esta responsabilidad al almacén bajo ningún acuerdo, el cual, en caso de darse o creerse es totalmente nulo. Sólo se dará por ingresado lo que consta en la lista de contenido que se expedirá por duplicado.");

$clausula[6]=utf8_decode("La duración de este contrato será de ".$duracion." meses como máximo a   partir de la fecha de ingreso, pudiendo el contratante retirar sus bienes cuando desee, previa coordinación con oficina, con un mínimo de  5 días antes cubriendo el año máximo ó periodo que ha sido contratado. El Exceso de este tiempo será materia de un nuevo contrato con el precio por alquiler actualizado.");

$clausula[7]=utf8_decode("Asimismo el almacén no se responsabiliza por el deterioro que el tiempo y medio ambiente pueda ocasionar en los bienes, y al requerirse continuos manipuleos pudiera acentuarse. También queda claramente especificado que el presente contrato sólo obliga al almacén a fijar el espacio y custodia de los bienes entregados, sin ninguna responsabilidad para la empresa por el deterioro, a pesar de continuamente utilizar deshumedecedores y fumigaciones y por tratarse de bienes usados.");

$clausula[8]=utf8_decode("Para el Transporte de Salida de los bienes en forma parcial y manipuleo interno se coordinará con la empresa sobre el importe actual por el Traslado y Manipuleo para la carga y descarga. \n\nSi hubiese requerimiento de manipuleo este tendrá un costo de US$ 40.00 (Cuarenta y 00/100 Dólares Americanos), este manipuleo también se coordinará previamente con la oficina con un mínimo 3 días antes de acordar este manipuleo y retiro.\nEl costo del transporte es por la cantidad de bienes y viajes para el recojo y/o devolución de los bienes y su valor será a tratar.");

$clausula[9]=utf8_decode("La empresa no se hace responsable por valores no declarados, en  caso de haberlos la custodia de dichos bienes se hará en contrato diferente a esos y por un monto proporcional a su valor declarado en una lista proporcionado por el cliente y previa verificación.");

$clausula[10]=utf8_decode("Al término del periodo contratado (".$duracion." meses) ó del tiempo acordado, el cliente se obliga a retirar sus bienes almacenados, de no hacerlo, la empresa podrá trasladar sus bienes a otro lugar, y rematarlos para cubrir los costos que origina su omisión, sin más autorización, que la suscripción del presente contrato.\n\nDar por terminado el contrato.");
		$pdf->Line(25,100,190,100);
		$pdf->Cell(0,5,'',0,1);


for($i=0;$i<=2;$i++)
{		$pdf->Cell(0,5,'',0,1);
		$cabecera=$titulo_clau[$i].":";
                $pdf->SetFont('Courier','B',11);
                $pdf->Cell(22,5,$cabecera,0,0,'L');
                $pdf->SetFont('Courier','',11);
                $pdf->MultiCell(0,5,$clausula[$i],0,'L');
}

$pdf->AddPage();

for($i=3;$i<=8;$i++)
{		$pdf->Cell(0,5,'',0,1);
		$cabecera=$titulo_clau[$i].":";
                $pdf->SetFont('Courier','B',11);
                $pdf->Cell(22,5,$cabecera,0,0,'L');
                $pdf->SetFont('Courier','',11);
                $pdf->MultiCell(0,5,$clausula[$i],0,'L');
}

for($i=9;$i<=10;$i++)
{		$pdf->Cell(0,5,'',0,1);
		$cabecera=$titulo_clau[$i].":";
                $pdf->SetFont('Courier','B',11);
                $pdf->Cell(22,5,$cabecera,0,0,'L');
                $pdf->SetFont('Courier','',11);
                $pdf->MultiCell(0,5,$clausula[$i],0,'L');
}
		$pdf->Cell(0,5,'',0,1);
		$pdf->Cell(0,5,'',0,1);
		$pdf->Cell(0,5,'',0,1);
		$pdf->Cell(0,5,'',0,1);
		$pdf->Cell(0,5,'',0,1);
		$pdf->SetFont('Courier','BU',11);
		$pdf->Cell(25,5,'',0,0,'L');
		$pdf->Cell(40,5,'                       ',0,0,'L');
		$pdf->Cell(35,5,'',0,0,'L');
		$pdf->Cell(40,5,'                            ',0,1,'L');

		$pdf->SetFont('Courier','B',10);
		$pdf->Cell(27,5,'',0,0,'L');
		$pdf->Cell(40,5,$cliente[0],0,0,'L');
		$pdf->Cell(40,5,'',0,0,'L');
		$pdf->Cell(40,5,'Arturo Ruales Mena',0,1,'L');

		$pdf->Cell(30,5,'',0,0,'L');
		$pdf->Cell(40,5,$cliente[2],0,0,'L');
		$pdf->Cell(30,5,'',0,0,'L');
		$pdf->Cell(40,5,$Locador,0,1,'L');

		$pdf->Cell(108,5,'',0,0,'L');
		$pdf->Cell(40,5,'Director - Gerente',0,1,'L');

		$pdf->Cell(108,5,'',0,0,'L');
		$pdf->Cell(40,5,'RUC 20100720427',0,1,'L');


                $archivo='Contrato'.$cliente[0].'.pdf';
                $pdf->Output($archivo,'D');
    	} 
};


?>
